//切换工作目录与导入初始数据
cd "D:\Document\doing\主动与被动信息披露——基于股份回购与机构调研"
/*
use "年度数据.dta",clear
save "年度数据.dta",replace
    */
use "年度数据.dta",clear

//删除部分变量
drop if 所属东财行业指数 == "金融" | 所属东财行业指数 == "房地产"
drop if Year<2010
drop Beta2 Cor2 NonSysRisk2 Rsq2 ARsq2    //总市值加权数据
drop Amount 第一大股东持股比例 OI NI Ail_rev Opncf_rev Cfadqrt Dps_at DiltEPS Rev_ps Opic_ps Apic_ps Sr_ps Udp_ps Rten_ps Ncf_ps Ebit_ps 个人来访接待量 个人来访占比 其他来访占比
drop 流通股东相对上一报告期新进股东持股比例

//缺失值处理
mvencode 证券公司调研次数 证券公司调研家数 基金公司调研次数 基金公司调研家数 信托公司调研次数 信托公司调研家数 财务公司调研次数 财务公司调研家数 银行调研次数 银行调研家数 私募调研次数 私募调研家数 保险公司调研次数 保险公司调研家数 资管公司调研次数 资管公司调研家数, mv(0)
mvencode 来访接待量 机构来访接待量, mv(0)
mvencode 基金资产管理计划持股比例 券商持股比例 QFII持股比例 社保基金持股比例 企业年金持股比例 保险公司持股比例 保险产品持股比例 信托公司持股比例 信托计划持股比例 财务公司持股比例 银行持股比例 一般法人持股比例 非金融类上市公司持股比例 养老基金持股比例, mv(0)
replace FCSRt=0 if FShrhN==0
replace BCSRt=0 if BShrhN==0
replace ICSRt=0 if IShrhN==0
replace SCSRt=0 if SShrhN==0
replace QFIICSRt=0 if QFIIShrhN==0
replace OCSRt=0 if OShrhN==0

//变量加工
gen 机构调研次数= 证券公司调研次数 + 基金公司调研次数 + 信托公司调研次数 + 财务公司调研次数 + 银行调研次数 + 私募调研次数 + 保险公司调研次数 + 资管公司调研次数
order 机构调研次数, before(证券公司调研次数)
gen Size = ln(AT) , after(AT)
gen 回购数量比例 = 100*回购数量/Gencpt ,after(回购数量)
gen 回购金额比例 = 100*回购金额/MarketValueA2 ,after(回购金额)
gen 国有企业回购比例 = 回购数量比例*国有企业
gen 国有企业机构调研 = 机构调研次数*国有企业
order 国有企业回购比例, after(回购数量比例)
order 国有企业机构调研, after(机构调研次数)
//缩尾
winsor2 回购次数 回购数量比例 回购金额比例 机构调研次数,replace cuts(1,99)

//面板数据设定
sort Scode Year
xtset Scode Year
/*
tab2 Year 回购次数
tab year ,gen(dumt) (tab命令用于列示变量year的组类别，选项gen（dumt）用于生产一个以dumt开头的年度虚拟变量) 
xtdescribe 
xtsum 回购次数 回购数量 回购金额
    */


/*+++++++++++++++++++++++++++++++++++对公司经营的影响+++++++++++++++++++++++++*/
//对投资者保护    对指数没影响 对排名影响相反
eststo est1 : xtreg 投资者保护指数 回购数量比例 机构调研次数 Size Aslbrt Roa_2 BSEPS EV2ToEBITDA M2同比 一致指数 国内生产总值指数,fe vce(robust)
eststo est2 : xtreg 投资者保护排名 回购数量比例 机构调研次数 Size Aslbrt Roa_2 BSEPS EV2ToEBITDA M2同比 一致指数 国内生产总值指数,fe vce(robust)
reg2docx est1 est2 using 公司经营分析.docx,append title("投资者保护") note("数据来源：东方财富Choice数据") t(%9.2f) scalars(r2(%9.2f)) star(* 0.10 ** 0.05 *** 0.01)  depvar order(机构调研次数 回购数量比例)  drop(Size Aslbrt Roa_2 BSEPS EV2ToEBITDA M2同比 一致指数 国内生产总值指数) noconstant b(%6.2f)

//对资产结构    回购增加资产负债率 都降低了总负债增长率 都降低了总资产增长率
eststo est1 : xtreg Aslbrt 回购数量比例 机构调研次数 Size Roa_2 BSEPS EV2ToEBITDA M2同比 一致指数 国内生产总值指数,fe vce(robust)
eststo est2 : xtreg Lbrt 回购数量比例 机构调研次数 Size Roa_2 BSEPS EV2ToEBITDA M2同比 一致指数 国内生产总值指数,fe vce(robust)
eststo est3 : xtreg Atrt 回购数量比例 机构调研次数 Size Roa_2 BSEPS EV2ToEBITDA M2同比 一致指数 国内生产总值指数,fe vce(robust)
reg2docx est1 est2 est3 using 公司经营分析.docx,append title("资产结构") note("数据来源：东方财富Choice数据") t(%9.2f) scalars(r2(%9.2f)) star(* 0.10 ** 0.05 *** 0.01)  depvar order(机构调研次数 回购数量比例)  drop(Size Roa_2 BSEPS EV2ToEBITDA M2同比 一致指数 国内生产总值指数) noconstant b(%6.2f)

//对公司运营    作用相同 降低了货币资金增长率与固定资产增长率
eststo est1 : xtreg Chgrwhrt 回购数量比例 机构调研次数 Size Aslbrt Roa_2 BSEPS EV2ToEBITDA M2同比 一致指数 国内生产总值指数,fe vce(robust)
eststo est2 : xtreg Ppert 回购数量比例 机构调研次数 Size Aslbrt Roa_2 BSEPS EV2ToEBITDA M2同比 一致指数 国内生产总值指数,fe vce(robust)
reg2docx est1 est2 using 公司经营分析.docx,append title("公司运营") note("数据来源：东方财富Choice数据") t(%9.2f) scalars(r2(%9.2f)) star(* 0.10 ** 0.05 *** 0.01)  depvar order(机构调研次数 回购数量比例)  drop(Size Aslbrt Roa_2 BSEPS EV2ToEBITDA M2同比 一致指数 国内生产总值指数) noconstant b(%6.2f)

//对销售管理财务费用的影响    都增加了管理费用 机构调研降低了财务费用
eststo est1 : xtreg Selexprt 回购数量比例 机构调研次数 Size Aslbrt Roa_2 BSEPS EV2ToEBITDA M2同比 一致指数 国内生产总值指数,fe vce(robust)
eststo est2 : xtreg Ohexprt 回购数量比例 机构调研次数 Size Aslbrt Roa_2 BSEPS EV2ToEBITDA M2同比 一致指数 国内生产总值指数,fe vce(robust)
eststo est3 : xtreg Fiexprt 回购数量比例 机构调研次数 Size Aslbrt Roa_2 BSEPS EV2ToEBITDA M2同比 一致指数 国内生产总值指数,fe vce(robust)
reg2docx est1 est2 est3 using 公司经营分析.docx,append title("费用") note("数据来源：东方财富Choice数据") t(%9.2f) scalars(r2(%9.2f)) star(* 0.10 ** 0.05 *** 0.01)  depvar order(机构调研次数 回购数量比例)  drop(Size Aslbrt Roa_2 BSEPS EV2ToEBITDA M2同比 一致指数 国内生产总值指数) noconstant b(%6.2f)

//对股票收益    机构调研没影响 股份回购显著降低
eststo est1 : xtreg BSEPS 回购数量比例 机构调研次数 Size Aslbrt Roa_2 EV2ToEBITDA M2同比 一致指数 国内生产总值指数,fe vce(robust)
reg2docx est1 using 公司经营分析.docx,append title("股票股利") note("数据来源：东方财富Choice数据") t(%9.2f) scalars(r2(%9.2f)) star(* 0.10 ** 0.05 *** 0.01)  depvar order(机构调研次数 回购数量比例)  drop(Size Aslbrt Roa_2 EV2ToEBITDA M2同比 一致指数 国内生产总值指数) noconstant b(%6.2f)

//对分红的影响   回购显著降低分红转增比例 
eststo est1 : xtreg 分红送股比例 回购数量比例 机构调研次数 Size Aslbrt Roa_2 BSEPS EV2ToEBITDA M2同比 一致指数 国内生产总值指数,fe vce(robust)
eststo est2 : xtreg 分红转增比例 回购数量比例 机构调研次数 Size Aslbrt Roa_2 BSEPS EV2ToEBITDA M2同比 一致指数 国内生产总值指数,fe vce(robust)
reg2docx est1 est2 using 公司经营分析.docx,append title("分红") note("数据来源：东方财富Choice数据") t(%9.2f) scalars(r2(%9.2f)) star(* 0.10 ** 0.05 *** 0.01)  depvar order(机构调研次数 回购数量比例)  drop(Size Aslbrt Roa_2 BSEPS EV2ToEBITDA M2同比 一致指数 国内生产总值指数) noconstant b(%6.2f)



//股票换手率
xtreg Turnover 回购次数 Size Curtrt Aslbrt BscEPSrt Atrt Ivtyto Roe_2 BscEPS,fe vce(robust)
estimates store est1
//股票流动性指标
xtreg Liquidility 回购次数 Size Curtrt Aslbrt BscEPSrt Atrt Ivtyto Roe_2 BscEPS,fe vce(robust)
estimates store est3
回购次数 回购数量 回购金额
reg Turnover Size

estimates table est1 est2 est3 ,star(0.10 0.05 0.01) stats(N r2_a)

reg2docx est1 est2 est3 using 回归结果.docx,replace title("AAA") note("数据来源：东方财富Choice数据") t(%9.2f) scalars(r2(%9.2f)) star(* 0.10 ** 0.05 *** 0.01)  depvar order(HHI gcycle  m2 ROA size al manager EPS)



//描述性统计
sum2docx CH using 描述性统计.docx , replace stats(N mean(%9.2f) sd(%9.2f) median min max) title("变量描述性统计") font("宋体",10,"black") note("数据来源：东方财富Choice数据") pagesize(A4)

corr2docx npl rwa Z值 HHI gcycle_std2 power sre gcycle m2 ROA size al manager EPS  using 描述性统计.docx , append pearson(pw) title("变量相关系数") font("Microsoft Himalaya",8,"black") note("数据来源：东方财富Choice数据") pagesize(A4) star(* 0.10 ** 0.05 *** 0.01) landscape

pwcorr npl rwa Z值 HHI gcycle_std2 power sre gcycle m2 ROA size al manager EPS, star(0.05)